Click - International Series 1/Click Jigsaw Puzzles: Ken Duncan.iso/mac/puzzles/EileanDonan.dxr/00254_hide-show resize.ls

Text File | 2002-11-11 | 714 b | 30 lines

property spriteNum
global previewSprite

on new me, spriteRef
  if the paramCount > 1 then
    spriteNum = spriteRef.spriteNum
  end if
  return me
end

on mouseWithin me
  if sprite(previewSprite - 2).visible and inside(theMouseLoc(), the rect of sprite (previewSprite - 1)) then
    sprite(previewSprite - 1).visible = 1
  else
    sprite(previewSprite - 1).visible = 0
  end if
end

on mouseLeave
  if not inside(theMouseLoc(), the rect of sprite (previewSprite - 1)) then
    sprite(previewSprite - 1).visible = 0
  end if
end

on mouseEnter me
  if sprite(previewSprite - 2).visible and inside(theMouseLoc(), the rect of sprite (previewSprite - 1)) then
    sprite(previewSprite - 1).visible = 1
  end if
end